home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Sound Fx
/
Sound Fx.iso
/
Software
/
UNZIPED
/
DRUMMER
/
DRUMMER.EXE
/
0
/
RCDATA
/
TFRMOPTIONS
/
TFRMOPTIONS.txt
Wrap
Text File
|
1997-03-26
|
12KB
|
398 lines
object frmOptions: TfrmOptions
Left = 282
Top = 123
BorderStyle = bsDialog
Caption = 'Options'
ClientHeight = 274
ClientWidth = 261
Font.Color = clWindowText
Font.Height = -10
Font.Name = 'MS Sans Serif'
Font.Style = []
OnActivate = FormActivate
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object PageControl1: TPageControl
Left = 7
Top = 7
Width = 241
Height = 215
ActivePage = TabSheet3
MultiLine = True
TabOrder = 0
object TabSheet1: TTabSheet
Caption = 'Midi Settings'
object Label1: TLabel
Left = 39
Top = 20
Width = 150
Height = 13
AutoSize = False
Caption = 'Midi Output'
end
object Label2: TLabel
Left = 39
Top = 65
Width = 105
Height = 14
AutoSize = False
Caption = 'Midi Input'
end
object Label3: TLabel
Left = 39
Top = 111
Width = 150
Height = 13
AutoSize = False
Caption = 'Output Channel'
end
object cbxMidiOut: TComboBox
Left = 39
Top = 33
Width = 150
Height = 24
Style = csDropDownList
ItemHeight = 0
TabOrder = 0
end
object cbxMidiIn: TComboBox
Left = 39
Top = 78
Width = 150
Height = 24
Style = csDropDownList
Enabled = False
ItemHeight = 0
TabOrder = 1
end
object cbxChannel: TComboBox
Left = 124
Top = 124
Width = 65
Height = 21
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'1'
'2'
'3'
'4'
'5'
'6'
'7'
'8'
'9'
'10'
'11'
'12'
'13'
'14'
'15'
'16')
TabOrder = 2
end
end
object TabSheet2: TTabSheet
Caption = 'File Save'
object Label4: TLabel
Left = 7
Top = 13
Width = 221
Height = 53
AutoSize = False
Caption =
'Should files be saved automatically when a new file is to be loa' +
'ded? (If not, you will be prompted)'
WordWrap = True
end
object cbxSavePattern: TCheckBox
Left = 13
Top = 72
Width = 157
Height = 13
Caption = 'Always save Pattern file'
TabOrder = 0
end
object cbxSaveSong: TCheckBox
Left = 13
Top = 98
Width = 157
Height = 13
Caption = 'Always save Song file'
TabOrder = 1
end
end
object TabSheet3: TTabSheet
Caption = 'Patch Names'
object lstPatches: TListBox
Left = 7
Top = 7
Width = 215
Height = 124
ItemHeight = 13
TabOrder = 0
OnDblClick = lstPatchesDblClick
end
object btnPatchDefaults: TBitBtn
Left = 59
Top = 136
Width = 111
Height = 33
Caption = 'Defaults (GM)'
TabOrder = 1
OnClick = btnPatchDefaultsClick
Glyph.Data = {
CE070000424DCE07000000000000360000002800000024000000120000000100
1800000000009807000000000000000000000000000000000000007F7F007F7F
007F7F007F7F007F7F007F7F7F00007F00007F00007F00007F00007F0000007F
7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7FFF
FFFF7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F007F7FFFFFFF007F7F007F7F
007F7F007F7F007F7F007F007F0000007F7F007F7F7F0000007F00007F00007F
00007F00007F00007F007F00007F0000007F7F007F7F007F7F007F7F007F7F7F
7F7F7F7F7FFFFFFF007F7F7F7F7F007F7F007F7F007F7F007F7F007F7F007F7F
7F7F7F7F7F7FFFFFFF007F7F007F7F007F7F007F7F007F00007F007F00007F00
00007F00007F00007F00007F00007F00007F00007F00007F00007F007F000000
7F7F007F7F007F7F007F7F7F7F7FFFFFFF7F7F7F7F7F7F007F7F007F7FFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFF007F7F007F7F7F7F7FFFFFFF007F7F007F7F007F
7F007F00007F00007F00007F00007F00007F0000FF0000FF0000FF0000FF0000
FF00007F00007F00007F007F0000007F7F007F7F007F7F7F7F7FFFFFFF007F7F
007F7F007F7FFFFFFF7F7F7F7F7F7F7F7F7F7F7F7F7F7F7FFFFFFF007F7F007F
7F7F7F7FFFFFFF007F7F007F7F007F00007F00007F00007F00007F0000FF0000
7F7F007F7F007F7F007F7F007F7F00FF00007F00007F00007F007F0000007F7F
007F7F7F7F7FFFFFFF007F7F007F7FFFFFFF7F7F7F007F7F007F7F007F7F007F
7F007F7F7F7F7FFFFFFF007F7F007F7F7F7F7FFFFFFF007F7F007F00007F0000
7F00007F00007F00007F7F007F7F007F7F007F7F007F7F007F7F007F7F00FF00
007F00007F007F0000007F7F007F7F7F7F7FFFFFFF007F7F007F7F7F7F7F007F
7F007F7F007F7F007F7F007F7F007F7F007F7F7F7F7FFFFFFF007F7F7F7F7FFF
FFFF007F7F007F00007F00007F00007F00007F00007F00007F7F007F7F007F7F
007F7F007F7F007F7F00FF007F00007F00007F0000007F7F007F7F7F7F7FFFFF
FFFFFFFFFFFFFFFFFFFF7F7F7FFFFFFF007F7F007F7F007F7F007F7F007F7F7F
7F7F7F7F7F7F7F7F7F7F7F007F7F007F7F00FF0000FF0000FF0000FF0000FF00
00FF0000FF00007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F
7F007F7F007F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F007F7F00
7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F
007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F
7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00
7F7F007F7F007F7F007F7F007F7F007F7F007F7FFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFF007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F
7F007F7F007F7F007F7F7F00007F00007F00007F00007F00007F0000007F7F00
7F7FFFFFFFFFFFFFFFFFFFFFFFFF007F7F007F7F007F7F007F7F007F7F007F7F
7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F007F7F00FF007F00007F00007F00
00007F7F007F7F007F7F007F7F007F7F007F7F00FF00007F00007F00007F0000
7F00007F007F0000007F7F7F7F7F7F7F7F7F7F7F7F7F7FFFFFFF007F7F007F7F
007F7F007F7F007F7F7F7F7FFFFFFF007F7F007F7F007F7F007F7F7F7F7F007F
7F00FF00007F00007F007F0000007F7F007F7F007F7F007F7F007F7F007F7F00
7F7F00FF00007F00007F00007F00007F007F0000007F7F7F7F7FFFFFFF007F7F
7F7F7FFFFFFF007F7F007F7F007F7F007F7F007F7F007F7F7F7F7F007F7F007F
7F007F7F007F7F7F7F7F007F7F007F7F00FF00007F00007F007F0000007F7F00
7F7F007F7F007F7F007F7F7F00007F0000007F00007F00007F00007F007F0000
007F7F007F7F7F7F7F007F7F007F7F7F7F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FF7F7F7F7F7F7F007F7F007F7F007F7F007F7F7F7F7F007F7F007F7F00FF0000
7F00007F00007F007F00007F00007F00007F00007F0000007F00007F00007F00
007F00007F00007F007F0000007F7F007F7F7F7F7FFFFFFF007F7F007F7F7F7F
7F7F7F7F7F7F7F7F7F7F7F7F7F007F7F007F7F007F7FFFFFFFFFFFFF007F7F7F
7F7F007F7F007F7F007F7F00FF00007F00007F00007F00007F00007F00007F00
007F00007F00007F00007F0000FF0000FF00007F007F0000007F7F007F7F007F
7F7F7F7FFFFFFFFFFFFF007F7F007F7F007F7F007F7F007F7F007F7FFFFFFFFF
FFFF7F7F7F7F7F7FFFFFFF7F7F7F007F7F007F7F007F7F007F7F00FF0000FF00
007F00007F00007F00007F00007F00007F0000FF0000FF00007F7F007F7F00FF
00007F7F007F7F007F7F007F7F007F7F7F7F7F7F7F7FFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFF7F7F7F7F7F7F007F7F007F7F7F7F7F007F7F007F7F007F7F
007F7F007F7F007F7F007F7F00FF0000FF0000FF0000FF0000FF0000FF00007F
7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00
7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F007F7F007F7F007F7F007F7F
007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F
7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F00
7F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F007F7F
007F7F007F7F007F7F007F7F007F7F007F7F}
NumGlyphs = 2
end
end
object TabSheet4: TTabSheet
Caption = 'Colors'
object Label5: TLabel
Left = 13
Top = 13
Width = 98
Height = 14
AutoSize = False
Caption = 'Pattern Element'
end
object Label6: TLabel
Left = 124
Top = 13
Width = 85
Height = 13
AutoSize = False
Caption = 'Color'
end
object lstPatternElement: TListBox
Left = 13
Top = 39
Width = 98
Height = 92
ItemHeight = 13
Items.Strings = (
'Background'
'Grid'
'Beat Division'
'Playback Pointer'
'Drum Hit')
TabOrder = 0
OnClick = lstPatternElementClick
end
object lstColor: TListBox
Left = 124
Top = 39
Width = 98
Height = 92
ItemHeight = 13
Items.Strings = (
'Black'
'Maroon'
'Green'
'Olive green'
'Navy blue'
'Purple'
'Teal'
'Gray'
'Silver'
'Red'
'Lime green'
'Blue'
'Fuchsia'
'Aqua'
'White'
'Yellow')
TabOrder = 1
OnClick = lstColorClick
end
end
object TabSheet5: TTabSheet
Caption = 'Divisions'
object GroupBox1: TGroupBox
Left = 39
Top = 72
Width = 157
Height = 91
Caption = 'Ticks per Beat'
TabOrder = 0
object optTPB4: TRadioButton
Left = 20
Top = 20
Width = 33
Height = 20
Caption = '4'
TabOrder = 0
end
object optTPB5: TRadioButton
Left = 20
Top = 39
Width = 33
Height = 20
Caption = '5'
TabOrder = 1
end
object optTPB6: TRadioButton
Left = 20
Top = 59
Width = 33
Height = 20
Caption = '6'
TabOrder = 2
end
object optTPB7: TRadioButton
Left = 59
Top = 20
Width = 33
Height = 20
Caption = '7'
TabOrder = 3
end
object optTPB8: TRadioButton
Left = 59
Top = 39
Width = 33
Height = 20
Caption = '8'
TabOrder = 4
end
object optTPB9: TRadioButton
Left = 59
Top = 59
Width = 33
Height = 20
Caption = '9'
TabOrder = 5
end
object optTPB10: TRadioButton
Left = 98
Top = 20
Width = 33
Height = 20
Caption = '10'
TabOrder = 6
end
object optTPB11: TRadioButton
Left = 98
Top = 39
Width = 33
Height = 20
Caption = '11'
TabOrder = 7
end
object optTPB12: TRadioButton
Left = 98
Top = 59
Width = 33
Height = 20
Caption = '12'
TabOrder = 8
end
end
object GroupBox2: TGroupBox
Left = 39
Top = 13
Width = 157
Height = 46
Caption = 'Beats per Measure'
TabOrder = 1
object optBPM3: TRadioButton
Left = 20
Top = 20
Width = 33
Height = 20
Caption = '3'
TabOrder = 0
end
object optBPM4: TRadioButton
Left = 98
Top = 20
Width = 33
Height = 20
Caption = '4'
TabOrder = 1
end
end
end
end
object btnOk: TBitBtn
Left = 163
Top = 234
Width = 85
Height = 33
TabOrder = 1
OnClick = btnOkClick
Kind = bkOK
end
object btnCancel: TBitBtn
Left = 7
Top = 234
Width = 85
Height = 33
TabOrder = 2
Kind = bkCancel
end
end